home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ShareWare OnLine 2
/
ShareWare OnLine Volume 2 (CMS Software)(1993).iso
/
prog
/
lb09c.zip
/
STRTEST.BAS
< prev
next >
Wrap
BASIC Source File
|
1992-03-14
|
203b
|
13 lines
' Test the left$() and right$() functions
test$ = "Here is my test string."
for i = -5 to len(test$)
print left$(test$, i)
print right$(test$, i)
next i